000000000 GGGGGGGGGGGG IIIIIIII1 NNN NNN 
LLL 000000000 GGGGGGGGGGGG III NNN NNN 
LLL 000000000 GGGGGGGGGGGG IIIT NNN NNN 
LLL 000 000 GGG II] NNN NNN 
LLL 000 000 GGG IIl NNN NNN 
LLL 000 GGG Il NNN NNN 
LLL 000 000 GGG Ill NNNNNN NNN 
LLL 000 000 GGG II] NNN NN 
LLL 000 000 GGG Ii] NNNNNN NNN 
LLL 000 000 GGG II] NN NNN NNN 
LLL 000 000 GGG II] NNN NNN NNN 
LLL 000 000 GGG III N 
LLL 000 000 GGG 66G6G6GGGG6G II] NNN NNNNNN 
LLL 000 000 GGG 666666666 Il NNN NNNNNN 
LLL 000 000 GGG 666666666 Il NNN NNNNNN 
LLL 000 000 GGG GGG II] NNN NNN 
LLL 000 000 GGG GGG II] NNN NNN 
LLL 000 000 GGG GGG II] NNN NNN 
LLLLLLLLLLLLLLL 000000000 GGGGGGGGG IIIIIIII NNN NNN 
LLLLLLLLLLLLLLL 000000000 GGGGGGGGG IIIIIIII1 NNN NNN 
LLLLLLLLLLLLLL 000000000 GGGGGGGGG IIIT NNN NNN 
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- SET PROTECTION ON CLI PAGES 19-$0- 1388 96:08 +36 AX/VMS Macro V04-00 


SOOO COCOCOOCOCOOOCOOCOCOOSCOOOOCOOOOSoO 
SOOoOCOGOOOCOOCOSCOOOOOOOOOSOOOOOOOoOO 


2=SEP=19 LOGIN. SRCJPROTCLI.MAR; 1 


-TITL aH tha Fe = SET PROTECTION ON CLI PAGES 
- IDEN “ 


j aeeneceeeenenecenereeceeeeeeennneeenceeeseuenesnteuecesseeesnetseeeseeeeers 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS cyan sneo UNDER A LICENSE AND MAY BE USED AND sorace 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH License AND WITH THE 
CLUSION OF THE ABOVE git NOTICE. THIS SOFTWARE OR ANY OTHER 


IN 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
Paasrehetee” NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
SORPORAT ion NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


LARA RRRRSARAAAAASSAALASLASESELESESE SERA R ASSES EEE SERRE EERE RE EERE RSE R SSCS EES | 


iF FACILITY: LOGINOUT 
ABSTRACT: INITIALIZE CLI CODE SECTION 
ENVIRONMENT: NATIVE MODE PRIVILEGED PROCEDURE 
AUTHOR: LEN KAWELL, 20-MAR-1980 


MODIFIED BY: 


SOoOOOCCOCOCOOSOSOSOOOSSOOSOOSOOSOOSOSOOOOOOOOOOOOOOCOOOOOOOOOOOOOO 


SOOoOoooooooooooooooooooooSo 
Ooo COCO COCCOCOCOCOSCOSOCOOCOCOCOSOSOOOCOOCOOOOCOOCOOCOCOO SOOO OSOOOOOO 
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v03-003 LJK0262 Lawrence J. Kenah 15-Feb-1984 
Add LGISCMSUPR to leave exec stack empty when getting into 


+ 
2 


supervisor mode. Move code that cancels a CLI'S exit handler 


from this module to LOGIN.B32. 


v03-002 Aceds76 Andrew C. Goldstein, 28-Nov-1983 15:57 
pa ck window in scanning page table. 
Add G $CAN CLI routine. 
v03-001 KDM0002 hleen D. Morse 28-Jun-1982 


Added $PSLDEF sad *SVADEF. 


PROTC = SET PROTECTICN ON CLI 
v04-0 DECLARATIONS 


54 
5 
ss 
000 3 
00000004 00 8 
00000008 44 3 
60 ; 
B08 61 ; MACROS 
00 6¢ 3 
000 6 
0000S 
$000 e 
Bn08 67 
000 68 
000 $9 
000 0 
000 71 
00000000 72 


PAGES 


.SBTTL DECLARATIONS 
+ SYMBOLIC CONSTANTS 


ROUTIN 
ARGLST 


-PSECT $CODE$,NOWRT EXE ,WORD 


INTERRUPT PRIORITY LEVELS 
PROCESS 


Of:46:30 


CONTROL BLOCK 


PROCESSOR REGISTERS 


cm » 


PAGE PROTECTION CODES 
ROGRAM L 


E 
STATUS LONGWORD 
TRY 


TABLE E 
TS INTO CALL FRAME 
AL ADDRESS FIELDS 


AX/VMS Macro V04-00 
LOGIN. SRCJPROTCLI.MAR;1 


VAL 
04 
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nN 3 
I PAGES 16-SEP-1984 AX/VMS Macro V04-00 Page 
ON THE CLI PAGES -SEP-1984 4 89:28 :38 LOGIN. SRCJPROTCLI.MAR; 1 ° a 


TH 
$008 2 ; .SBTTL CHANGE THE PROTECTION ON THE CLI PAGES : 

2000 £6 ; LGISPROTECT_CLI = CHANGE THE PROTECTION ON THE CLI PAGES ; 

0000 78: THIS ROUTINE IS CALLED TO CHANGE THE OWNER AND PROTECTION OF THE ; 

9900 79 : MAPPED CLI PAGES. THEY ARE CREATED OWNED BY USER MODE, AND THIS F 

000 80: ROUTINE CHANGES THE OWNER TO SUPERVISOR MODE; IF ANY PAGES ARE ; 

9000 81 : WRITEABLE, THe PROTECTION IS CHANGED TO DISALLOW USER MODE WRITING. ; 

0000 HE : INPUTS: ; 

0000 «84: F 

9000 85 : 4(AP) = ADDRESS OF CLI SIMGACT RETURN ADDRESS ARRAY | ; 

0000 87: MODE = KERNEL : 

0000 «8B: | ; 

0000 89 : OUTPUTS: | : 

0000 «=—«90::: ; 

9009 31 : CTLSAG_IMAGE = SAVED CLI ADDRESS ARRAY | ; 

0000 38 ; PTESV_OWN OF ALL CLI PTE'S CHANGED TO PSLSC, SUPER | ; 

B08 8¢ s PTESV— PROT OF ALL WRITEABLE CLI PTE'S CHANGED TO PRTS$C _URSW | : 

0000 4-96 : 

0000 97 .ENABLE LSB | ; 

0000 3=s«98 | ; 

0000 99 LGISPROTECT CLI:: F 

007¢ 0000 100 WORD <R2,R3,R4,R5,R6> : | ; 

9008 101 $LKWSET oy INABRz =PROT_ROUTINE : LOCK ROUTINE IN WORKING SET | ; 

3F 50 €9 001 102 BLBC ~RO,20$ : BR IF FAILU | ; 

51 04 AC DO 0016 103 MOVL  4(AP),R1 : GET ADDRESS” OF cu gADDRESS ARRAY ; 
55 61 7D OO1A 104 MOV = (R11), RS : GET CLI ADDRESS A : 

56 «655)—«=D1sSs001D~—S—s«d105 CMPL = RS, RO : FIRST ADDRESS STRUY LAST? ; 

06 1A 0020 106 BGTRU 108 : BR IF YES = ORDE F 

55 56 00 0022 107 MOVL  R6,R5 : SWITCH ORDER OF ADDRESSES ; 

56 6661S 0 ss0025.—Ss«108 MOVL (R1),R6 Spt ; 

55 OFF 8F AA 0028 109 108: BICW  #VASM_BYTE,RS : CLEAL BYTE OFFSETS ; 
56 «OO1FF 8F «= AAs«002D~—é«*12:0 BICW  #VASMTBYTE.R6 lee : 
52. 55 «00 003¢ 111 MOVL  R5,R : GET FIRST ADDRESS OF CLI ; 

0035 112 DSBINT Sere STDEL : DISABLE AST DEL : 

54 00000000'GF DO 0038 113 MOVL GASCHSeL. CURPCB, R4 : GET ADDRESS OF PCB. : 
55 00000000'GF DO 0042 114 MOVL caer ser R5 : GET ADDRESS OF PHD WINDOW 3 
00000000'GF 16 0049 115 JSB GaNMGSPTE! NDS ; CONVERT VA TO PTE INDEX ; 
04 50 €8 O0O4F 116 LBS —s- RO, 30$ + BRANCH IF SUCCESS | : 

0098 117 ENBINT > RE-ENABLE AST'S : 

04 035 118 20S: ET : RETURN FAILURE : 

51  00000000'GF 0 iets 120 30$: | MOVL §$G*MMGSGL_SPTBASE,R1 : GET ADDRESS OF SYSTEM PAGE TABLE | ; 
0050 121 PROT_LOOP: | : 

6C B443 DS 0050 1 é TS apcest PHD(R4)CR3) ; FAULT IN PAGE TABLE PAGE 3 

0061 1 DSBINT : DISABLE SWAPPING 3 

55 6C B443_ OE 0067 124 MOVAL apchse PHD(R4)CR3],R5_: VA OF PAGE TABLE ENTRY : 
50 55 15 O09 EF 06¢ 125 EXTZV avASy agen #VAS$S_VPN,RS, RO ; GET SYSTEM VPN OF PTE : 
6140 05 0071 126 TSTL  —(R1) ; EME CK IF SYSTEM PTE Is STILL VALID | : 

29 14 «0074 137 BGTR ; BRANCH IF NOT = RETR : 

50 65 DO 0076 128 MOVL ert PAGE TABLE EN NTRY. | : 

02 17 +€D 0079 129 CMP2V ariegee OWN, #PTESS -OWN,= ; IS PAGE CURRENTLY OWNED BY USER MODE? ; 

03 «50 007C 8= 130 RO, #PSC$C_U ; ; 
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00 PROT_ROUTINE: 
QOOO00AE '00000000' boa 


B 4 
PAGES 1 = SEB-1984 02:04:56 AX/VMS Macro V04-00 Page 
THE CLI PAGES ~SEP=1984 01:46: LOGIN. SRCJPROTCLI.MAR;1 
BNEQ 50$ : BR IF 
INSV #PSLSC_S + MAKE INE TOWNER SUPERVISOR MODE 
#PTESV-O NC APTESS _OWN,RO” 
IFNOWRT #1 he ; BR IF PAGE NOT WRITEABLE 
INSV = #PRTSC_URSW, MAKE PAGE WRITEABLE ONLY BY SUPER 
#PTESV-PROT, ‘#PTESS _PROT, ko 
MOVL RO (RST : SAVE NEW PTE 
BGTR 50$ : BR IF ALID 
INVALID Re ; INVAL IDATE “TRANSLATION BUFFER 
DECL. R + DECREMENT PTE INDEX 
MOVAB  =512(R2),R2 + DECREMENT VA 
ENBINT : RE-ENABLE SUAPPING AND PAGEFAULTS 
PL = R2, R6 + ALL PAG NE? 
GEQU. PROT_LOOP ; BR IF NO = CONTINUE 
ENBINT + RE-ENAB T'S 
HOVL #1,RO : SET SUCCESS 


PROTECTION ROUTINE DESCRIPTOR 
.LONG LGISPROTECT_CLI,PROT _ROUTINE 


-DISABLE LSB 


Be Be Be Be Oe Be Be Be Se Se Be Be Be Be Se Ge Be SH Se Se Ge Se Ge SH Se Se SH Se Se Se Se Ge Se Ses Se Oe SESE SS Oe Oe Oe Se Se Se Se Se SESE Se Se BeBe Se seas 


C 4 | 
PROT = SET PROTECTION ON CLI PAGES SEP-1984 AX/VMS agro v4 p 
Hivae itd EXECUTE IMAGE, ACTIVATE. AN TAGE Morera 18B2 BFieei86 PARC YRS Magra vOrOO = Page 2, v04 

as 154 .SBTTL EXECUTE_IMAGE, ACTIVATE AN IMAGE 
B6 «156: 
056 1 5: THIS ROUTINE 1S COPIED, INTO P1 SPACE (AND THEREFORE MUST BE PIC) | 
86 158; AND WHEN CALLED, WILL RUNDOWN THE LOGIN IMAGE AND ACTIVATE ANOTHER | 
0B6 159 : IMAGE (ESSENTIALLY A CHAIN). AFTER THE IMACE COMPLETES, THE PROCESS | 
0B6 160 : WILL BE TERMINATED. | 

00B6 161; 

0086 162 INPUTS: 
0B6 163; 

0086 164 ACCESS MODE IS EXECUTIVE. 

bose 1ea | MMGSIMGHDRBUF = IMAGE HEADER BUFFER, THE FIRST QUADWORD CONTAINS 

boas 167 A DESCRIPTOR OF THE IMAGE FILE SPECIFICATION. 

0086 169 : OUTPUTS: 

0086 170: 

00B6 1712 NONE, CONTROL NEVER RETURNS TO THE CALLER. 

0086 172 in-- 

00B6 17 

0086 174 EXECUTE IMAGE: : 

0000 0086 175 “WORD. 0 
00B8 176 
00B8 177 SRUNDWN_$, ACHODES#PSLSC_USER ; RUNDOWN LOGIN. IMAGE 
SC 00000000'GF 9E O0C1 178 MOVAB ~G*MNGSIMGHDRBUF ZAP : POINT TO IMGHDR BUFFER/FILESPEC 
00000000'GF 17 00C8 179 JMP-sG*EXESPROCIMGACT ACTIVATE THE REQUESTER Tones 
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PROTC = SET PROTECTION ON CLI PAGES 16-SEP-1984 04:5 AX/VMS Macro V04-00 Page VAL 

voe-000 LGISCMSUPR = Change Mode to Supervisor -SEP-1984 : :46:30 CLOGIN.SRCJPROTCLI.MAR; 1 ve 8, v04 
O0¢E 1) . SUBTITLE LGISCMSUPR = Change Mode to Supervisor : 
Bate : $ ; Functional Description: : 
OOCE 185; This procedure allows a process with CMEXEC or CMKRNL privilege to ‘ 
QOCE 186 ; call an arbitrary procedure in supervisor mode. The code drops from ; 
OOCE 187 ; exec mode to supervisor mode in such a way that the exec stack is | ‘ 
Opce 138 3 empty when supervisor mode is entered. : 
Py | e 
OOCE 190 ; Calling Sequence: : 
OOCE 191: woe | 
pote 136 : SCMEXEC (routin = LGISCMSUPR) | : 
OOCE 194: Input Parameters: F 
OOCE 195; : 
OOCE 196; Q4(AP) = Address of procedure to be executed in supervisor mode : 
Bore 4 ; O8(AP) = Address of argument List to pass to said procedure. | ; 
OOCE 199 : Implicit Input: | : 
QOCE 200 ; : 
OOCE 201 ; It is assumed that this routine is entered via a SCMEXEC system : 
OOCE sos 3 service so that there are only two call frames on the exec stack. ; 
OOCE 203 ; The current frame is the result of the CALLG instruction inside : 
OOCE 204 ; the SCMEXEC aysten service. The previous frame is created by .he | ; 
OOCE 205 ; change mode dispatcher. 3 
OOCE 206 ; : 
OOCE 207 ; Output Parameters: ; 
OOCE 208 ; at 3 
Bare $0? 3 There are no explicit output parameters from this procedure. | ; 
OOcE 311 ; Implicit Output: | ; 
OOCE $18 : The frame built by the change mode dispatcher is moved from the | : 
OOCE 214 ; exec stack to the supervisor stack. The procedure specified by 3 
Bate $12 3 the first parameter is called in supervisor mode. | : 
pace sit : The exec stack is empty when supervisor mode is entered. 3 
OOCE 219 : Side Effects: | ; 
OOCE 20 ; : 
Bore 221 ; The procedure, although entered in exec mode, exits in supervisor mode. : 
OOCE : > Status: ; 
OOCE 4 ; . ; : : 
OOCE 5 3 This routine simply passes back whatever status is returned by : 
Bore 8 ; the caller's supervisor procedure. : 
OOCE 8: If the SADJSTK call fails, this procedure passes back the error ; 
bore 3 : status without attempting to enter supervisor mode. : 
Bee 1; If this procedure is called (via SCMEXEC or SCMKRNL) from exec ; 
33 § 3 or kernel mode, the failure status SS$_IVSSRQ is returned. : 
ce 4 > Note: : 
0 cE § ; Modification of a call frame is a flagrant violation of the VAX-11 ; 
OOCE : Calling Standard. Such is Life. ; 


cc OO FF > - Orrrv\mlOvreOoOoeaae—ee nw ee SS OS = 7 . —— i | aaa 


; We want to evaporate the frame put here by EXESCMKRNL. The argument List 


E 4 

PROT = SET PROTECTION ON CLI PAGES 16-SEP-1984 02:04: AX/VMS Macro V04-00 Page 7 VAL 
yOe-0b0 LGISCMSUPR = Change Mode to Supervisor eset 8 06:38 LOGIN. SRCJPROTCLI.MAR;1 ° (5) | v04 

OCE :- é 

CE : 

CE 40 LGISCMSUPR:: ; 

0000 C 41 WOR 0 ; Make this part simple : 

50 oc oP tg MOVPSL RO 3; Get current PSL ; 

0D 44 ; This procedure could cause ugly things to happen (an REI instruction will ; 

OD 45 ; cause a reserved operand exception) if called from exec or kernel mode and : 

8 23 ; supervisor mode were blindly entered. ; 

17 ~€0 $00 48 BBS #PSLS$V_PRVMOD+1,- :; Branch if previous mode is . 

06 a Bebe 49 3 supervisor or user. . 

50 Q0000'°8F 3C D6 50 MOVZWL #SS$_IVSSRQ, RO ; Otherwise, report an error ; 

04 OQO0DB 51 RET ; 

26 : 

5 : 

54 


; passed to this procedure must be preserved. 


0O0DC 
0ODC 
00DC 
0ODC 55 
08 AD 5¢ DO OODC 56 10$: MOVL AP, SFSL_SAVE_AP(FP) 3; Alter the saved AP 
10 AD E6'AF 9E O0EO 57 MOVAB B*208, SF$L_SAVE_PC (FP) ; Alter the return PC 
04 Boe? 28 RET ; Transfer control to 20$ | 
Boee o9 ; We arrive here with the exec stack in the following shape. 
00E6 6¢ ; OO(SP) = 0 \ Frame 
OOE6 263; 04(SP) = 0 \ built by 
OOE6 3 264 ; O8(SP) = Saved AP > Systen's 
QOE6 § 265 ; 12(SP) = Saved FP . / change mode 
QOOE6 266 ; 16(SP) = Address of SRVEXIT in CMODSSDSP / dispatcher 
OOE6 267 ; 20(SP) = Saved PC of CHME exception 
it $e8 ; 24(SP) = Saved PSL of CHME exception 
7E D4& QOE6 5f0 20S: CLRL -(SP) : Indicate simple SP adjustment 
O00E8 71 SADJSTK_S - ; Expand supervisor stack 
Q0E8 sf¢ ACMODE = #PSLSC_SUPER,- ; by seven longwords 
O0E8 27 ADJUST = #-<EXESC_CMSTKS2+8>,- 
N0E8 274 NEWADR = (SP) ; New SSP returned in (SP) 
= 3 8680 ite sf? BLBC RO,40$ ; Quit if error occurs 
QOFB 277 ; At this point, the frame created by CMODSSDSP as well as the PC,PSL 
OOFB 278 ; exception pair generated by the CHMK must be moved to the supervisor 
oere 4s 3 stack so that the returns all work correctly. 
3F 06=s«BB sid PUSHR #*M<RO,R1,R2,R3,R4,R5> ; Save MOVC registers 
OOFD Hy : This adds 24 bytes to the stack so the operands to MOVC3 must be 
Rhee Se 3; adjusted accordingly. (The NEWSP Longword is also on the stack.) 
0008'8F 28 OQOFD 36 MOVC3 #<EXESC_CMSTKSZ+8>,- ; Move frame and PC/PSL pair 
1C AE 810) 8 <<6+1>#Z>(SP),= ; Former 4(SP). Address of first 
18 BE 103 88 : ; _longword that must be moved 
0105 89 @<6*4>(SP) ; Former top of stack. Contains 
B1Re 90 : adjusted value of supervisor 
105 91 3 stack pointer 
3F) OS fsOé&BAA BI38 38 POPR #*M<RO,R1,R2,R35,R4,R5> ; Restore MOVC registers 
5D 8E DO $107 94 MOVL (SP)+, FP : Point FP to supervisor stack 


TL 
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~ eT PROTECTION ON CLI PAGES 16-SEP-1984 0 04:56 AX/VMS Macro V04-00 Page g VAL 
LGISCMSUPR = Change Mode to Supervisor -SEP-1984 01:46: LOGIN. SRCJPROTCLI.MAR;1 (5). v04 


00000008'8F C0 8198 + ADDL2 #<EXESC_CMSTKSZ+8>, SP ; Remove rest of stuff from exec stack 
111 3 ; At this porns, the exec stack is empty. The Hoy y mode dispatcher's frame 
111 98 ; and the PC/PSL “wes from the CHME exception are located at the top of the 
Mi + ; supervisor stack. 
02800000 8F DD ate 01 PUSHL #<<PSLS$C_SUPER@PSLSV_PRVMOD>+=- ; Fabricate PSL to get into 
0117 O¢ <PSL$C_SUPER@PSLS$V_CURMOD>> * supervisor mode 
1B'AF 9F 0117 30 PUSHAB B*30$ ; We will begin executing at 30$ 
02 Bie Be REI ; Change mode to supervisor 
0118 88 ; We are now in supervisor mode. The stack contents are exactly the same 
pie if 3; as pictured above. 
08 BC FA 0118 09 30$: CALLG @ARGLST(AP),=- ; Call specified procedure — 
04 BC O11E 310 @ROUTIN(AP) ; _with specified argument List 
04 0120 311 40S: RET ; Return to caller 
0121 315 
0121 31 ~ END 


PROTCLI 
Symbol table 
ST 


—— mmm Oo 
ad OPP 


PTE “on 
PTESS_PROT 
PTESV_OWN 


Initialization 
Command processing 
Pass 1 


Page faults 


- SET PROTECTION ON CLI PAGES -SEP-1984 be: :04:5 
-SEP-1984 :46:3 

00000008 

eeereree x 

eeekenee x 

eeeeeeee x 

9° 0092 RG ; 

000 00 

OOOOOCE RG 8 

0000000 RG 

ektkenee x 0 

eeeneeee x 0 

eeereeee x 0 

0000006 

si 

O00003A 

0000005D R Os 

QOOOOOOAE R 0 

0000000 

9900000¢ 

0000000 

00000018 

00000016 

00000002 

00000004 

00000017 

00000018 

00000004 

geeeeene x 02 

00000008 

00000010 

eeereeee x 02 

keeeeere 6X 02 

eentenee 6X 02 

eeerener GX 02 

000001F F 

00000015 

00000009 

beeen eee eee enon ewe + 
: : Psect synopsis ! 
Allocation PSECT No. Attributes 
00000000 <( 0.) 00 ¢ QO.) NOPIC USR CON ABS LCL 
00000000 ( 0.) O1¢ 1.) NOPIC USR CON ABS LCL 
00000121 ( 289.) 02 ¢ 2.) NOPIC USR CON REL LCL 
Soineetestnatieteatnatatietadtadnadttetnedatatieeta at teed $ 
: : Performance indicators ! 
CPU Time Elapsed Time 


135 


203 


3 


AX/VMS Macro V04-00 


Page 


LOGIN. SRCJPROTCLI.MAR; 1 


T NOVEC BYTE 


es NOEXE NORD — NOVEC BYTE 
NOSHR EXE RD 
NOSHR EXE 


RD NOURT NOVEC WORD 


- SET PROTECTION ON CLI PAGES 7 a et oR 94:06 +38 AX/VMS Macro Vv04-00 


PROTCLI 
vanett Macro Run Statistics 984 LOGIN. SRC JPROTCLI.MAR;1 


prado} table sort 79 :00: “3 :00: 3: 
ee table output :00: ‘ :00: ‘ 
Psect synopsis output 00:00. 3 
Cross-reference output 700. Hf :99:0 " 
Assembler run totals 45 0:00:04. -6 


The as $5 Limit was 1350 pages. 
- ba 0 pages) of virtual memory were used to buffer the intermediate code. 
$ . were 20 pages of symbol table space allocated to hold 395 non-local 10 local symbols. 
H source ti0b8 were read in Pass 1, producing 14 object records in Pass 
3 pages of virtual memory were used to define 22 macros. 


Macro Library name Macros defined 
_$255$0UA28: Leia. o.60s 7 Sete 8: 1 8 
=$522$0UA 8:CSYS.OBJJLIB.MLB;1 

$255$DUA28: SYSLIBJSTARLET.MLB; 2 11 

TOTALS (all Libraries) 19 


525 GETS were required to define 19 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:PROTCLI/OBJ=OBJ$:PROTCLI MSRC$:PROTCLI/UPDATE=(ENH$:PROTCLI) +EXECML$/LIB+LIB$:LOGIN/LIB 


rom, 


AH-BT13A-SE 
VAX/VMS_V4_.0 


PMENT CORPORATION 
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